(set: $teamname to (prompt: "Your team's name, please:", "Red Dragons"))
(set: $money to 1000)
(set: $monthtime to 1)
(set: $racecar to (a: "cr5"))
(set: $junks to " ")
(set: $restore to false)
(set: $itembuy to (a: false,false,false,false,false,false,false,false,false,false,false))
(set: $racedone to (a: 0,0,0,0,0,0,0))
(set: $racewin to (a:))
(set: $canrace to true)
**(print: $teamname)**
You start off your journey in the exciting world of racing as the team manager. You will control the assets while the racers will drive cars. You will choose which races to take part in and which to leave. You will be the beating heart of this team! Note you have 10 years before you retire. Races are held every month(total of 120 races) **Are you Ready???**
(Please avoid using the back controls and use only options!)
[[Go to City]](print: "Money: " + "$money")
(set: $year to 1980+(floor: (($monthtime-1)/12)))
(print: "Year: "+"$year")
(set: $month to $monthtime-(floor: (($monthtime-1)/12))*12)
(print: "Month: " + "$month")
<img src="carimages\citymap.jpg" width="500" height="300">
You are in the bustling center of the city! Where would you like to go?
<img src="carimages\auctions.jpg" width="500" height="300">
Want to buy a new racing ride??? Get them here by exchanging them for other street cars. Check out the offers!
[[Go to Auction Center]]
<img src="carimages\junkyard.jpg" width="500" height="300">
Find Rusties to restore here. Cheapest prices always!!!
[[Go to Junkyard]]
<img src="carimages\racetrack.jpg" width="500" height="300">
Want to race your ride this month. Come here and join for cups and money!
[[Go to Race Track]]
<img src="carimages\restoration.jpg" width="500" height="300">
Attach the nuts and bolts to your car. Covert the rusties to riches!!!
[[Go to Garage]]
[[Race Cars Owned]]
[[Finish the month]](if: $monthtime < 5)[\
Upcoming Offers(Will become Active soon):
(if: not($itembuy's (1)))[\
Basic Tyre
<img src="carimages\tyre1.jpg" width="500" height="300">
Exchange for Fiat Italia:
<img src="carimages\fiatitaliarest.png" width="500" height="300">
]
]
(if: $monthtime > 4)[\
(if: not($itembuy's (1)))[\
Basic Tyre
<img src="carimages\tyre1.jpg" width="500" height="300">
Exchange for Fiat Italia:
<img src="carimages\fiatitaliarest.png" width="500" height="300">
[[Exchange for Basic Tyre]]
]
(if: not($itembuy's (2)) and $monthtime<10)[\
Upcoming Offers(Will become Active soon):
Basic Engine (300HP)
<img src="carimages\eng3.jpg" width="500" height="300">
Exchange for Merceds Axor:
<img src="carimages\mercedesaxorrest.png" width="500" height="300">
]
]
(if: $monthtime > 9)[\
(if: not($itembuy's (2)))[\
Basic Engine (300HP)
<img src="carimages\eng3.jpg" width="500" height="300">
Exchange for Merceds Axor:
<img src="carimages\mercedesaxorrest.png" width="500" height="300">
[[Exchange for Mercedes Axor]]
]
(if: not($itembuy's (3)) and $monthtime<20)[\
Upcoming Offers(Will become Active soon):
Race Car 2
<img src="carimages\cr1.jpg" width="500" height="300">
Exchange for 1937 America La France:
<img src="carimages\1937AmericaLaFrancerest.png" width="500" height="300">
]
]
(if: $monthtime > 19)[\
(if: not($itembuy's (3)))[\
Race Car 2
<img src="carimages\cr1.jpg" width="500" height="300">
Exchange for 1937 America La France:
<img src="carimages\1937AmericaLaFrancerest.png" width="500" height="300">
[[Exchange for 1937 America La France]]
]
(if: not($itembuy's (4)) and $monthtime<30)[\
Upcoming Offers(Will become Active soon):
Improved Engine (450HP)
<img src="carimages\eng1.jpg" width="500" height="300">
Exchange for Triumph Spitfire:
<img src="carimages\triumphspitfirerest.png" width="500" height="300">
]
]
(if: $monthtime > 29)[\
(if: not($itembuy's (4)))[\
Improved Engine (450HP)
<img src="carimages\eng1.jpg" width="500" height="300">
Exchange for Triumph Spitfire:
<img src="carimages\triumphspitfirerest.png" width="500" height="300">
[[Exchange for Triumph Spitfire]]
]
(if: not($itembuy's (5)) and $monthtime<40)[\
Upcoming Offers(Will become Active soon):
Advanced Racing Tyre
<img src="carimages\tyre2.jpg" width="500" height="300">
Exchange for Ford Vicky:
<img src="carimages\fordvickyrest.png" width="500" height="300">
]
]
(if: $monthtime > 39)[\
(if: not($itembuy's (5)))[\
Advanced Racing Tyre
<img src="carimages\tyre2.jpg" width="500" height="300">
Exchange for Ford Vicky:
<img src="carimages\fordvickyrest.png" width="500" height="300">
[[Exchange for Ford Vicky]]
]
(if: not($itembuy's (6)) and $monthtime<55)[\
Upcoming Offers(Will become Active soon):
Race Car 3
<img src="carimages\cr3.jpg" width="500" height="300">
Exchange for Cadillac 240SZ:
<img src="carimages\Cadillac240SZrest.png" width="500" height="300">
]
]
(if: $monthtime > 54)[\
(if: not($itembuy's (6)))[\
Race Car 3
<img src="carimages\cr3.jpg" width="500" height="300">
Exchange for Cadillac 240SZ:
<img src="carimages\Cadillac240SZrest.png" width="500" height="300">
[[Exchange for Cadillac 240SZ]]
]
(if: not($itembuy's (7)) and $monthtime<65)[\
Upcoming Offers(Will become Active soon):
Advanced Engine (750HP)
<img src="carimages\eng2.jpg" width="500" height="300">
Exchange for Jensen Intercepter:
<img src="carimages\jensenintercepterrest.png" width="500" height="300">
]
]
(if: $monthtime > 64)[\
(if: not($itembuy's (7)))[\
Advanced Engine (750HP)
<img src="carimages\eng2.jpg" width="500" height="300">
Exchange for Jensen Intercepter:
<img src="carimages\jensenintercepterrest.png" width="500" height="300">
[[Exchange for Jensen Intercepter]]
]
(if: not($itembuy's (8)) and $monthtime<75)[\
Upcoming Offers(Will become Active soon):
Race Car 4
<img src="carimages\cr4.jpg" width="500" height="300">
Exchange for Cadillac 250GTS:
<img src="carimages\cadillac250gtsrest.png" width="500" height="300">
]
]
(if: $monthtime > 74)[\
(if: not($itembuy's (8)))[\
Race Car 4
<img src="carimages\cr4.jpg" width="500" height="300">
Exchange for Cadillac 250GTS :
<img src="carimages\cadillac250gtsrest.png" width="500" height="300">
[[Exchange for Cadillac 250GTS]]
]
(if: not($itembuy's (9)) and $monthtime<85)[\
Upcoming Offers(Will become Active soon):
Race Car 5
<img src="carimages\cr7.jpg" width="500" height="300">
Exchange for Austin Healey:
<img src="carimages\austinhealeyrest.png" width="500" height="300">
]
]
(if: $monthtime > 84)[\
(if: not($itembuy's (9)))[\
Race Car 5
<img src="carimages\cr7.jpg" width="500" height="300">
Exchange for Austin Healey:
<img src="carimages\austinhealeyrest.png" width="500" height="300">
[[Exchange for Austin Healey]]
]
(if: not($itembuy's (10)) and $monthtime<100)[\
Upcoming Offers(Will become Active soon):
Race Car 6
<img src="carimages\cr2.jpg" width="500" height="300">
Exchange for Dodge Viper:
<img src="carimages\dodgeviperrest.png" width="500" height="300">
]
]
(if: $monthtime > 99)[\
(if: not($itembuy's (10)))[\
Race Car 6
<img src="carimages\cr2.jpg" width="500" height="300">
Exchange for Dodge Viper:
<img src="carimages\dodgeviperrest.png" width="500" height="300">
[[Exchange for Dodge Viper]]
]
(if: not($itembuy's (11)) and $monthtime<115)[\
Upcoming Offers(Will become Active soon):
Race Car 7
<img src="carimages\cr6.png" width="500" height="300">
Exchange for Lancia Aurelia B20GT Coupe:
<img src="carimages\LanciaAureliaB20GTcouperest.png" width="500" height="300">
]
]
(if: $monthtime > 114 and not($itembuy's (11)))[\
Race Car 7
<img src="carimages\cr6.png" width="500" height="300">
Exchange for Lancia Aurelia B20GT Coupe:
<img src="carimages\LanciaAureliaB20GTcouperest.png" width="500" height="300">
[[Exchange for Lancia Aurelia B20GT Coupe]]
]
[[Go to City]]
<audio src="carsounds/auctions.mp3"; autoplay>(print: "Money: " + "$money")
**JUNKYARD: CARS ON SALE**
1937 America La France
<img src="carimages\1937AmericaLaFrancerust.png" width="500" height="300">
[[Buy for 3000]]
Austin Healey
<img src="carimages\austinhealeyrust.png" width="500" height="300">
[[Buy for 9000]]
Cadillac 240SZ
<img src="carimages\Cadillac240SZrust.png" width="500" height="300">
[[Buy for 6000]]
Cadillac 250GTS
<img src="carimages\cadillac250gtsrust.png" width="500" height="300">
[[Buy for 8000]]
Dodge Viper
<img src="carimages\dodgeviperrust.png" width="500" height="300">
[[Buy for 10000]]
Fiat Italia
<img src="carimages\fiatitaliarust.png" width="500" height="300">
[[Buy for 1000]]
Ford Vicky
<img src="carimages\fordvickyrust.png" width="500" height="300">
[[Buy for 5000]]
Jensen Intercepter
<img src="carimages\jensenintercepterrust.png" width="500" height="300">
[[Buy for 7000]]
Lancia Aurelia B20GT Coupe
<img src="carimages\LanciaAureliaB20GTcouperust.png" width="500" height="300">
[[Buy for 11000]]
Mercedes Axor
<img src="carimages\mercedesaxorrust.png" width="500" height="300">
[[Buy for 2000]]
Triumph Spitfire
<img src="carimages\triumphspitfirerust.png" width="500" height="300">
[[Buy for 4000]]
[[Go to City]]**RACETRACK: Le Mans (print: "$year")**
<img src="carimages\track.png" width="500" height="300">
(set: $rvar to 0)
(if: $canrace)[\
Ready, Set, Go!!!
(if: $racecar contains "cr5")[\
[[Race with Car Level 1]]
(set: $rvar to $racedone's (1))
(print: "Races Done: " + "$rvar")
]
(if: $racecar contains "cr1")[\
[[Race with Car Level 2]]
(set: $rvar to $racedone's (2))
(print: "Races Done: " + "$rvar")
]
(if: $racecar contains "cr3")[\
[[Race with Car Level 3]]
(set: $rvar to $racedone's (3))
(print: "Races Done: " + "$rvar")
]
(if: $racecar contains "cr4")[\
[[Race with Car Level 4]]
(set: $rvar to $racedone's (4))
(print: "Races Done: " + "$rvar")
]
(if: $racecar contains "cr7")[\
[[Race with Car Level 5]]
(set: $rvar to $racedone's (5))
(print: "Races Done: " + "$rvar")
]
(if: $racecar contains "cr2")[\
[[Race with Car Level 6]]
(set: $rvar to $racedone's (6))
(print: "Races Done: " + "$rvar")
]
(if: $racecar contains "cr6")[\
[[Race with Car Level 7]]
(set: $rvar to $racedone's (7))
(print: "Races Done: " + "$rvar")
]
]
(else:)
[\
You have already raced this month. Wait for the next month!
]
[[Go to City]](if: $junks is "fiatitalia")[\
(if: $restime <= $monthtime)[\
<img src="carimages\fiatitaliarest.png" width="500" height="300">
(set: $restore to true)
Restore Complete!
]
(else:)
[\
<img src="carimages\fiatitaliarust.png" width="500" height="300">
Repair in Progress!
]
]
(if: $junks is "mercedesaxor")[\
(if: $restime <= $monthtime)[\
<img src="carimages\mercedesaxorrest.png" width="500" height="300">
(set: $restore to true)
Restore Complete!
]
(else:)
[\
<img src="carimages\mercedesaxorrust.png" width="500" height="300">
Repair in Progress!
]
]
(if: $junks is "1937americalafrance")[\
(if: $restime <= $monthtime)[\
<img src="carimages\1937AmericaLaFrancerest.png" width="500" height="300">
(set: $restore to true)
Restore Complete!
]
(else:)
[\
<img src="carimages\1937AmericaLaFrancerust.png" width="500" height="300">
Repair in Progress!
]
]
(if: $junks is "triumphspitfire")[\
(if: $restime <= $monthtime)[\
<img src="carimages\triumphspitfirerest.png" width="500" height="300">
(set: $restore to true)
Restore Complete!
]
(else:)
[\
<img src="carimages\triumphspitfirerust.png" width="500" height="300">
Repair in Progress!
]
]
(if: $junks is "fordvicky")[\
(if: $restime <= $monthtime)[\
<img src="carimages\fordvickyrest.png" width="500" height="300">
(set: $restore to true)
Restore Complete!
]
(else:)
[\
<img src="carimages\fordvickyrust.png" width="500" height="300">
Repair in Progress!
]
]
(if: $junks is "cadillac240sz")[\
(if: $restime <= $monthtime)[\
<img src="carimages\Cadillac240SZrest.png" width="500" height="300">
(set: $restore to true)
Restore Complete!
]
(else:)
[\
<img src="carimages\Cadillac240SZrust.png" width="500" height="300">
Repair in Progress!
]
]
(if: $junks is "jensenintercepter")[\
(if: $restime <= $monthtime)[\
<img src="carimages\jensenintercepterrest.png" width="500" height="300">
(set: $restore to true)
Restore Complete!
]
(else:)
[\
<img src="carimages\jensenintercepterrust.png" width="500" height="300">
Repair in Progress!
]
]
(if: $junks is "cadillac250gts")[\
(if: $restime <= $monthtime)[\
<img src="carimages\cadillac250gtsrest.png" width="500" height="300">
(set: $restore to true)
Restore Complete!
]
(else:)
[\
<img src="carimages\cadillac250gtsrust.png" width="500" height="300">
Repair in Progress!
]
]
(if: $junks is "austinhealey")[\
(if: $restime <= $monthtime)[\
<img src="carimages\austinhealeyrest.png" width="500" height="300">
(set: $restore to true)
Restore Complete!
]
(else:)
[\
<img src="carimages\austinhealeyrust.png" width="500" height="300">
Repair in Progress!
]
]
(if: $junks is "dodgeviper")[\
(if: $restime <= $monthtime)[\
<img src="carimages\dodgeviperrest.png" width="500" height="300">
(set: $restore to true)
Restore Complete!
]
(else:)
[\
<img src="carimages\dodgeviperrust.png" width="500" height="300">
Repair in Progress!
]
]
(if: $junks is "lanciaaureliab20gtcoupe")[\
(if: $restime <= $monthtime)[\
<img src="carimages\LanciaAureliaB20GTcouperest.png" width="500" height="300">
(set: $restore to true)
Restore Complete!
]
(else:)
[\
<img src="carimages\LanciaAureliaB20GTcouperust.png" width="500" height="300">
Repair in Progress!
]
]
[[Trash this Car]]
(if: $restore)[\
[[Load it on to Trailer->Go to City]]
]
(else:)[\
[[Go to City]]
]
<audio src="carsounds/garage.mp3"; autoplay>(if: $monthtime<120 and $money>=0)
[\
(set: $monthtime to $monthtime + 1)
(if: $canrace)[\
(set: $racewin to it + (a: 5))
]
(else:)[\
(set: $canrace to true)
]
(go-to: "Go to City")
]
(else:)[\
(go-to: "Finish")
]
**You have finished the game. Thanks for your interest...**
(set: $gwin to 0)(set: $swin to 0)(set: $bwin to 0)(set: $fin to 0)(set: $fail to 0)(for: each _item, ...$racewin) [(if: _item is 1)[(set: $gwin to $gwin + 1)](if: _item is 2)[(set: $swin to $swin + 1)](if: _item is 3)[(set: $bwin to $bwin + 1)](if: _item is 4)[(set: $fin to $fin + 1)](if: _item is 5)[(set: $fail to $fail + 1)]]
(if: $money<0)[\
Verdict: You go bankrupt; you cannot complete repairs or buy a new car. You are forced to sell your existing car and change your career...
(print: "Gold Cups: " + "$gwin" + " " + "Silver Cups: " + "$swin" + " " + "Bronze Cups: " + "$bwin" + " " + "Finishes: " + "$fin" + " " + "Breakdowns/No Participation: " + "$fail")
]
(if: $monthtime>=120 and $racecar's length >0)[\
Verdict: You are a successful racing team. You have won many races and have made your mark in the world of racing. Your racing legends will always be remebered...
(print: "Gold Cups: " + "$gwin " + "Silver Cups: " + "$swin " + "Bronze Cups: " + "$bwin " + "Finishes: " + "$fin " + "Breakdowns/No Participation: " + $fail)
]
(if: $monthtime>=120 and $racecar's length is 0)[\
Verdict: You are a successful dealer. You have restored many rusties and have made quite sonme cars. However, Racing is not your forte...
(print: "Gold Cups: " + "$gwin " + "Silver Cups: " + "$swin " + "Bronze Cups: " + "$bwin " + "Finishes: " + "$fin " + "Breakdowns/No Participation: " + $fail)
]
(if: $racecar contains "cr5")[\
<img src="carimages\cr5.jpg" width="500" height="300">
[[Sell Race Car 1]]
]
(if: $racecar contains "cr1")[\
<img src="carimages\cr1.jpg" width="500" height="300">
[[Sell Race Car 2]]
]
(if: $racecar contains "cr3")[\
<img src="carimages\cr3.jpg" width="500" height="300">
[[Sell Race Car 3]]
]
(if: $racecar contains "cr4")[\
<img src="carimages\cr4.jpg" width="500" height="300">
[[Sell Race Car 4]]
]
(if: $racecar contains "cr7")[\
<img src="carimages\cr7.jpg" width="500" height="300">
[[Sell Race Car 5]]
]
(if: $racecar contains "cr2")[\
<img src="carimages\cr2.jpg" width="500" height="300">
[[Sell Race Car 6]]
]
(if: $racecar contains "cr6")[\
<img src="carimages\cr6.jpg" width="500" height="300">
[[Sell Race Car 7]]
]
[[Go to City]]
(set: $tmp to (array: "cr5"))
(set: $racecar to $racecar - $tmp)
(set: $money to $money+10000)
(go-to: "Go to City")(set: $tmp to (array: "cr1"))
(set: $racecar to $racecar - $tmp)
(set: $money to $money+20000)
(go-to: "Go to City")(set: $tmp to (array: "cr3"))
(set: $racecar to $racecar - $tmp)
(set: $money to $money+30000)
(go-to: "Go to City")(set: $tmp to (array: "cr4"))
(set: $racecar to $racecar - $tmp)
(set: $money to $money+40000)
(go-to: "Go to City")(set: $tmp to (array: "cr7"))
(set: $racecar to $racecar - $tmp)
(set: $money to $money+50000)
(go-to: "Go to City")(set: $tmp to (array: "cr2"))
(set: $racecar to $racecar - $tmp)
(set: $money to $money+60000)
(go-to: "Go to City")(set: $tmp to (array: "cr7"))
(set: $racecar to $racecar - $tmp)
(set: $money to $money+70000)
(go-to: "Go to City")(if: $money > 999 and ($junks is " "))[\
Purchased!
(set: $junks="fiatitalia")
(set: $money to $money-1000)
(set: $restime to $monthtime + 1)
]
(else:)
[\
You do not have sufficient money or space in garage...
]
[[Go to Junkyard]]
<audio src="carsounds/purchase.mp3"; autoplay>(if: $money > 2999 and ($junks is " "))[\
Purchased!
(set: $junks="1937americalafrance")
(set: $money to $money-3000)
(set: $restime to $monthtime + 4)
]
(else:)
[\
You do not have sufficient money or space in garage...
]
[[Go to Junkyard]]
<audio src="carsounds/purchase.mp3"; autoplay>(if: $money > 8999 and ($junks is " "))[\
Purchased!
(set: $junks="austinhealey")
(set: $money to $money-9000)
(set: $restime to $monthtime + 5)
]
(else:)
[\
You do not have sufficient money or space in garage...
]
[[Go to Junkyard]]
<audio src="carsounds/purchase.mp3"; autoplay>(if: $money > 5999 and ($junks is " "))[\
Purchased!
(set: $junks="cadillac240sz")
(set: $money to $money-6000)
(set: $restime to $monthtime + 5)
]
(else:)
[\
You do not have sufficient money or space in garage...
]
[[Go to Junkyard]]
<audio src="carsounds/purchase.mp3"; autoplay>(if: $money > 7999 and ($junks is " "))[\
Purchased!
(set: $junks="cadillac250gts")
(set: $money to $money-8000)
(set: $restime to $monthtime + 5)
]
(else:)
[\
You do not have sufficient money or space in garage...
]
[[Go to Junkyard]]
<audio src="carsounds/purchase.mp3"; autoplay>(if: $money > 9999 and ($junks is " "))[\
Purchased!
(set: $junks="dodgeviper")
(set: $money to $money-10000)
(set: $restime to $monthtime + 10)
]
(else:)
[\
You do not have sufficient money or space in garage...
]
[[Go to Junkyard]]
<audio src="carsounds/purchase.mp3"; autoplay>(if: $money > 10999 and ($junks is " "))[\
Purchased!
(set: $junks="lanciaaureliab20gtcoupe")
(set: $money to $money-11000)
(set: $restime to $monthtime + 12)
]
(else:)
[\
You do not have sufficient money or space in garage...
]
[[Go to Junkyard]]
<audio src="carsounds/purchase.mp3"; autoplay>(if: $money > 4999 and ($junks is " "))[\
Purchased!
(set: $junks="fordvicky")
(set: $money to $money-5000)
(set: $restime to $monthtime + 4)
]
(else:)
[\
You do not have sufficient money or space in garage...
]
[[Go to Junkyard]]
<audio src="carsounds/purchase.mp3"; autoplay>(if: $money > 6999 and ($junks is " "))[\
Purchased!
(set: $junks="jensenintercepter")
(set: $money to $money-7000)
(set: $restime to $monthtime + 5)
]
(else:)
[\
You do not have sufficient money or space in garage...
]
[[Go to Junkyard]]
<audio src="carsounds/purchase.mp3"; autoplay>(if: $money > 1999 and ($junks is " "))[\
Purchased!
(set: $junks="mercedesaxor")
(set: $money to $money-2000)
(set: $restime to $monthtime + 2)
]
(else:)
[\
You do not have sufficient money or space in garage...
]
[[Go to Junkyard]]
<audio src="carsounds/purchase.mp3"; autoplay>(if: $money > 3999 and ($junks is " "))[\
Purchased!
(set: $junks="triumphspitfire")
(set: $money to $money-4000)
(set: $restime to $monthtime + 4)
]
(else:)
[\
You do not have sufficient money or space in garage...
]
[[Go to Junkyard]]
<audio src="carsounds/purchase.mp3"; autoplay>(if: $junks is "fiatitalia" and $restore)[\
Exchanged
(set: $junks to " ")
(set: $restore to false)
(set: $itembuy's (1) to true)
(if: $racecar's length > 0)[\
(set: $racedone's ($racecar's length) to 0)
]
[[Go to Auction Center]]
]
(else:)[\
You don't meet the requirements
[[Go to Auction Center]]
]
(if: $junks is "mercedesaxor" and $restore)[\
Exchanged
(set: $junks to " ")
(set: $restore to false)
(set: $itembuy's (2) to true)
(if: $racecar's length > 0)[\
(set: $racedone's ($racecar's length) to 0)
]
[[Go to Auction Center]]
]
(else:)[\
You don't meet the requirements
[[Go to Auction Center]]
]
(if: $junks is "1937americalafrance" and $restore)[\
Exchanged
(set: $junks to " ")
(set: $restore to false)
(set: $itembuy's (3) to true)
(set: $racecar to it + (a: 'cr1'))
[[Go to Auction Center]]
]
(else:)[\
You don't meet the requirements
[[Go to Auction Center]]
]
(if: $junks is "triumphspitfire" and $restore)[\
Exchanged
(set: $junks to " ")
(set: $restore to false)
(set: $itembuy's (4) to true)
(if: $racecar's length > 0)[\
(set: $racedone's ($racecar's length) to 0)
]
[[Go to Auction Center]]
]
(else:)[\
You don't meet the requirements
[[Go to Auction Center]]
]
(if: $junks is "fordvicky" and $restore)[\
Exchanged
(set: $junks to " ")
(set: $restore to false)
(set: $itembuy's (5) to true)
(if: $racecar's length > 0)[\
(set: $racedone's ($racecar's length) to 0)
]
[[Go to Auction Center]]
]
(else:)[\
You don't meet the requirements
[[Go to Auction Center]]
](if: $junks is "jensenintercepter" and $restore)[\
Exchanged
(set: $junks to " ")
(set: $restore to false)
(set: $itembuy's (7) to true)
(if: $racecar's length > 0)[\
(set: $racedone's ($racecar's length) to 0)
]
[[Go to Auction Center]]
]
(else:)[\
You don't meet the requirements
[[Go to Auction Center]]
](if: $junks is "cadillac250gts" and $restore)[\
Exchanged
(set: $junks to " ")
(set: $restore to false)
(set: $itembuy's (8) to true)
(set: $racecar to it + (a: 'cr4'))
[[Go to Auction Center]]
]
(else:)[\
You don't meet the requirements
[[Go to Auction Center]]
](if: $junks is "cadillac240sz" and $restore)[\
Exchanged
(set: $junks to " ")
(set: $restore to false)
(set: $itembuy's (6) to true)
(set: $racecar to it + (a: 'cr3'))
[[Go to Auction Center]]
]
(else:)[\
You don't meet the requirements
[[Go to Auction Center]]
](if: $junks is "austinhealey" and $restore)[\
Exchanged
(set: $junks to " ")
(set: $restore to false)
(set: $itembuy's (9) to true)
(set: $racecar to it + (a: 'cr7'))
[[Go to Auction Center]]
]
(else:)[\
You don't meet the requirements
[[Go to Auction Center]]
](if: $junks is "dodgeviper" and $restore)[\
Exchanged
(set: $junks to " ")
(set: $restore to false)
(set: $itembuy's (10) to true)
(set: $racecar to it + (a: 'cr2'))
[[Go to Auction Center]]
]
(else:)[\
You don't meet the requirements
[[Go to Auction Center]]
](if: $junks is "lanciaaureliab20gtcoupe" and $restore)[\
Exchanged
(set: $junks to " ")
(set: $restore to false)
(set: $itembuy's (11) to true)
(set: $racecar to it + (a: 'cr6'))
[[Go to Auction Center]]
]
(else:)[\
You don't meet the requirements
[[Go to Auction Center]]
]Are you sure you wish to scrap this car?
[[Yes]]
[[No]](set: $junks to " ")
(set: $restore to false)
(go-to: "Go to Garage")(go-to: "Go to Garage")(if: $monthtime<20)[\
(if: $racedone's (1) is 0)[\
(set: $first to 50)
(set: $second to 20)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) is 1)[\
(set: $first to 40)
(set: $second to 30)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) is 2)[\
(set: $first to 30)
(set: $second to 30)
(set: $third to 20)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 3 and $racedone's (1) <= 5)[\
(set: $first to 20)
(set: $second to 20)
(set: $third to 20)
(set: $finish to 30)
(set: $breakdown to 10)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 6)[\
(set: $first to 0)
(set: $second to 20)
(set: $third to 30)
(set: $finish to 30)
(set: $breakdown to 20)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(else:)
[\
(if: $racedone's (1) is 0)[\
(set: $first to 0)
(set: $second to 0)
(set: $third to 30)
(set: $finish to 40)
(set: $breakdown to 50)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 1)[\
(set: $first to 0)
(set: $second to 0)
(set: $third to 0)
(set: $finish to 50)
(set: $breakdown to 50)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(if: $prob>0 and $prob <= $first)[\
<img src="carimages\cupgold.jpeg" width="500" height="500">
You have come first. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 1))
]
(if: $prob>$first and $prob<=($first + $second))[\
<img src="carimages\cupsilver.jpg" width="500" height="300">
You have come second. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 2))
]
(if: $prob>($first+$second) and $prob<=($first + $second + $third))[\
<img src="carimages\cupbronze.jpg" width="500" height="300">
You have come third. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 3))
]
(if: $prob>($first + $second + $third) and $prob<=($first + $second + $third + $finish))[\
<img src="carimages\finish.jpg" width="500" height="300">
Great Work! You finished the race.
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 4))
]
(if: $prob>($first + $second + $third + $finish) and $prob<=($first + $second + $third + $finish + $breakdown))[\
<img src="carimages\break.jpg" width="500" height="300">
Oops! You had a breakdown. It will take some money to repair...
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 5))
]
(if: $racewin's ($racewin's length) is 1)[\
(if: $monthtime<20)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 2000)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 2500)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 3000)
]
]
(if: $racewin's ($racewin's length) is 2)[\
(if: $monthtime<20)[\
(set: $money to $money + 500)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 1300)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 2000)
]
]
(if: $racewin's ($racewin's length) is 3)[\
(if: $monthtime<20)[\
(set: $money to $money + 300)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 800)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1100)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1500)
]
]
(if: $racewin's ($racewin's length) is 4)[\
(if: $monthtime<20)[\
(set: $money to $money + 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 600)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1000)
]
]
(if: $racewin's ($racewin's length) is 5)[\
(if: $monthtime<20)[\
(set: $money to $money - 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money - 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money - 700)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money - 1000)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money - 1500)
]
]
[[Go to City]]
<audio src="carsounds/racing.mp3"; autoplay>(if: $monthtime<55)[\
(if: $racedone's (2) >= 1 and $racedone's (2) <= 3)[\
(set: $first to 50)
(set: $second to 20)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (2) >= 4 and $racedone's (2) <= 5)[\
(set: $first to 40)
(set: $second to 30)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (2) >= 6 and $racedone's (2) <= 8)[\
(set: $first to 30)
(set: $second to 30)
(set: $third to 20)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (2) >= 9 and $racedone's (2) <= 12)[\
(set: $first to 20)
(set: $second to 20)
(set: $third to 20)
(set: $finish to 30)
(set: $breakdown to 10)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (2) >= 13)[\
(set: $first to 0)
(set: $second to 20)
(set: $third to 30)
(set: $finish to 30)
(set: $breakdown to 20)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(else:)
[\
(if: $racedone's (2) is 0)[\
(set: $first to 0)
(set: $second to 0)
(set: $third to 30)
(set: $finish to 40)
(set: $breakdown to 50)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (2) >= 1)[\
(set: $first to 0)
(set: $second to 0)
(set: $third to 0)
(set: $finish to 50)
(set: $breakdown to 50)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(if: $prob>0 and $prob <= $first)[\
<img src="carimages\cupgold.jpeg" width="500" height="500">
You have come first. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 1))
]
(if: $prob>$first and $prob<=($first + $second))[\
<img src="carimages\cupsilver.jpg" width="500" height="300">
You have come second. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 2))
]
(if: $prob>($first+$second) and $prob<=($first + $second + $third))[\
<img src="carimages\cupbronze.jpg" width="500" height="300">
You have come third. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 3))
]
(if: $prob>($first + $second + $third) and $prob<=($first + $second + $third + $finish))[\
<img src="carimages\finish.jpg" width="500" height="300">
Great Work! You finished the race.
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 4))
]
(if: $prob>($first + $second + $third + $finish) and $prob<=($first + $second + $third + $finish + $breakdown))[\
<img src="carimages\break.jpg" width="500" height="300">
Oops! You had a breakdown. It will take some money to repair...
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 5))
]
(if: $racewin's ($racewin's length) is 1)[\
(if: $monthtime<20)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 2000)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 2500)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 3000)
]
]
(if: $racewin's ($racewin's length) is 2)[\
(if: $monthtime<20)[\
(set: $money to $money + 500)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 1300)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 2000)
]
]
(if: $racewin's ($racewin's length) is 3)[\
(if: $monthtime<20)[\
(set: $money to $money + 300)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 800)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1100)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1500)
]
]
(if: $racewin's ($racewin's length) is 4)[\
(if: $monthtime<20)[\
(set: $money to $money + 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 600)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1000)
]
]
(if: $racewin's ($racewin's length) is 5)[\
(if: $monthtime<20)[\
(set: $money to $money - 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money - 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money - 700)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money - 1000)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money - 1500)
]
]
[[Go to City]]
<audio src="carsounds/racing.mp3"; autoplay>(if: $monthtime<75)[\
(if: $racedone's (1) is 0)[\
(set: $first to 50)
(set: $second to 20)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) is 1)[\
(set: $first to 40)
(set: $second to 30)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) is 2)[\
(set: $first to 30)
(set: $second to 30)
(set: $third to 20)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 3 and $racedone's (1) <= 5)[\
(set: $first to 20)
(set: $second to 20)
(set: $third to 20)
(set: $finish to 30)
(set: $breakdown to 10)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 6)[\
(set: $first to 0)
(set: $second to 20)
(set: $third to 30)
(set: $finish to 30)
(set: $breakdown to 20)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(else:)
[\
(if: $racedone's (1) is 0)[\
(set: $first to 0)
(set: $second to 0)
(set: $third to 30)
(set: $finish to 40)
(set: $breakdown to 50)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 1)[\
(set: $first to 0)
(set: $second to 0)
(set: $third to 0)
(set: $finish to 50)
(set: $breakdown to 50)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(if: $prob>0 and $prob<($first + 1))[\
<img src="carimages\cupgold.jpeg" width="500" height="500">
You have come first. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 1))
]
(if: $prob>$first and $prob<=($first + $second))[\
<img src="carimages\cupsilver.jpg" width="500" height="300">
You have come second. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 2))
]
(if: $prob>($first+$second) and $prob<=($first + $second + $third))[\
<img src="carimages\cupbronze.jpg" width="500" height="300">
You have come third. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 3))
]
(if: $prob>($first + $second + $third) and $prob<=($first + $second + $third + $finish))[\
<img src="carimages\finish.jpg" width="500" height="300">
Great Work! You finished the race.
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 4))
]
(if: $prob>($first + $second + $third + $finish) and $prob<=($first + $second + $third + $finish + $breakdown))[\
<img src="carimages\break.jpg" width="500" height="300">
Oops! You had a breakdown. It will take some money to repair...
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 5))
]
(if: $racewin's ($racewin's length) is 1)[\
(if: $monthtime<20)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 2000)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 2500)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 3000)
]
]
(if: $racewin's ($racewin's length) is 2)[\
(if: $monthtime<20)[\
(set: $money to $money + 500)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 1300)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 2000)
]
]
(if: $racewin's ($racewin's length) is 3)[\
(if: $monthtime<20)[\
(set: $money to $money + 300)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 800)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1100)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1500)
]
]
(if: $racewin's ($racewin's length) is 4)[\
(if: $monthtime<20)[\
(set: $money to $money + 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 600)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1000)
]
]
(if: $racewin's ($racewin's length) is 5)[\
(if: $monthtime<20)[\
(set: $money to $money - 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money - 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money - 700)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money - 1000)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money - 1500)
]
]
[[Go to City]]
<audio src="carsounds/racing.mp3"; autoplay>(if: $monthtime<85)[\
(if: $racedone's (1) is 0)[\
(set: $first to 50)
(set: $second to 20)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) is 1)[\
(set: $first to 40)
(set: $second to 30)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 2 and $racedone's (1) <= 5)[\
(set: $first to 30)
(set: $second to 30)
(set: $third to 20)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 6 and $racedone's (1) <= 7)[\
(set: $first to 20)
(set: $second to 20)
(set: $third to 20)
(set: $finish to 30)
(set: $breakdown to 10)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 8)[\
(set: $first to 0)
(set: $second to 20)
(set: $third to 30)
(set: $finish to 30)
(set: $breakdown to 20)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(else:)
[\
(if: $racedone's (1) is 0)[\
(set: $first to 0)
(set: $second to 0)
(set: $third to 30)
(set: $finish to 40)
(set: $breakdown to 50)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 1)[\
(set: $first to 0)
(set: $second to 0)
(set: $third to 0)
(set: $finish to 50)
(set: $breakdown to 50)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(if: $prob>0 and $prob<($first + 1))[\
<img src="carimages\cupgold.jpeg" width="500" height="500">
You have come first. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 1))
]
(if: $prob>$first and $prob<=($first + $second))[\
<img src="carimages\cupsilver.jpg" width="500" height="300">
You have come second. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 2))
]
(if: $prob>($first+$second) and $prob<=($first + $second + $third))[\
<img src="carimages\cupbronze.jpg" width="500" height="300">
You have come third. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 3))
]
(if: $prob>($first + $second + $third) and $prob<=($first + $second + $third + $finish))[\
<img src="carimages\finish.jpg" width="500" height="300">
Great Work! You finished the race.
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 4))
]
(if: $prob>($first + $second + $third + $finish) and $prob<=($first + $second + $third + $finish + $breakdown))[\
<img src="carimages\break.jpg" width="500" height="300">
Oops! You had a breakdown. It will take some money to repair...
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 5))
]
(if: $racewin's ($racewin's length) is 1)[\
(if: $monthtime<20)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 2000)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 2500)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 3000)
]
]
(if: $racewin's ($racewin's length) is 2)[\
(if: $monthtime<20)[\
(set: $money to $money + 500)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 1300)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 2000)
]
]
(if: $racewin's ($racewin's length) is 3)[\
(if: $monthtime<20)[\
(set: $money to $money + 300)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 800)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1100)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1500)
]
]
(if: $racewin's ($racewin's length) is 4)[\
(if: $monthtime<20)[\
(set: $money to $money + 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 600)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1000)
]
]
(if: $racewin's ($racewin's length) is 5)[\
(if: $monthtime<20)[\
(set: $money to $money - 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money - 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money - 700)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money - 1000)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money - 1500)
]
]
[[Go to City]]
<audio src="carsounds/racing.mp3"; autoplay>(if: $monthtime<100)[\
(if: $racedone's (1) is 0)[\
(set: $first to 50)
(set: $second to 20)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) is 1)[\
(set: $first to 40)
(set: $second to 30)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 2 and $racedone's (1) <= 5)[\
(set: $first to 30)
(set: $second to 30)
(set: $third to 20)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 6 and $racedone's (1) <= 7)[\
(set: $first to 20)
(set: $second to 20)
(set: $third to 20)
(set: $finish to 30)
(set: $breakdown to 10)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 8)[\
(set: $first to 0)
(set: $second to 20)
(set: $third to 30)
(set: $finish to 30)
(set: $breakdown to 20)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(else:)
[\
(if: $racedone's (1) is 0)[\
(set: $first to 0)
(set: $second to 0)
(set: $third to 30)
(set: $finish to 40)
(set: $breakdown to 50)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) >= 1)[\
(set: $first to 0)
(set: $second to 0)
(set: $third to 0)
(set: $finish to 50)
(set: $breakdown to 50)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(if: $prob>0 and $prob<($first + 1))[\
<img src="carimages\cupgold.jpeg" width="500" height="500">
You have come first. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 1))
]
(if: $prob>$first and $prob<=($first + $second))[\
<img src="carimages\cupsilver.jpg" width="500" height="300">
You have come second. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 2))
]
(if: $prob>($first+$second) and $prob<=($first + $second + $third))[\
<img src="carimages\cupbronze.jpg" width="500" height="300">
You have come third. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 3))
]
(if: $prob>($first + $second + $third) and $prob<=($first + $second + $third + $finish))[\
<img src="carimages\finish.jpg" width="500" height="300">
Great Work! You finished the race.
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 4))
]
(if: $prob>($first + $second + $third + $finish) and $prob<=($first + $second + $third + $finish + $breakdown))[\
<img src="carimages\break.jpg" width="500" height="300">
Oops! You had a breakdown. It will take some money to repair...
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 5))
]
(if: $racewin's ($racewin's length) is 1)[\
(if: $monthtime<20)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 2000)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 2500)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 3000)
]
]
(if: $racewin's ($racewin's length) is 2)[\
(if: $monthtime<20)[\
(set: $money to $money + 500)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 1300)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 2000)
]
]
(if: $racewin's ($racewin's length) is 3)[\
(if: $monthtime<20)[\
(set: $money to $money + 300)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 800)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1100)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1500)
]
]
(if: $racewin's ($racewin's length) is 4)[\
(if: $monthtime<20)[\
(set: $money to $money + 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 600)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1000)
]
]
(if: $racewin's ($racewin's length) is 5)[\
(if: $monthtime<20)[\
(set: $money to $money - 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money - 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money - 700)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money - 1000)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money - 1500)
]
]
[[Go to City]]
<audio src="carsounds/racing.mp3"; autoplay>(if: $monthtime<115)[\
(if: $racedone's (2) >= 1 and $racedone's (2) <= 3)[\
(set: $first to 50)
(set: $second to 20)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (2) >= 4 and $racedone's (2) <= 5)[\
(set: $first to 40)
(set: $second to 30)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (2) >= 6 and $racedone's (2) <= 8)[\
(set: $first to 30)
(set: $second to 30)
(set: $third to 20)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (2) >= 9 and $racedone's (2) <= 12)[\
(set: $first to 20)
(set: $second to 20)
(set: $third to 20)
(set: $finish to 30)
(set: $breakdown to 10)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (2) >= 13)[\
(set: $first to 0)
(set: $second to 20)
(set: $third to 30)
(set: $finish to 30)
(set: $breakdown to 20)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(else:)
[\
(if: $racedone's (2) is 0)[\
(set: $first to 0)
(set: $second to 0)
(set: $third to 30)
(set: $finish to 40)
(set: $breakdown to 50)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (2) >= 1)[\
(set: $first to 0)
(set: $second to 0)
(set: $third to 0)
(set: $finish to 50)
(set: $breakdown to 50)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(if: $prob>0 and $prob<($first + 1))[\
<img src="carimages\cupgold.jpeg" width="500" height="500">
You have come first. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 1))
]
(if: $prob>$first and $prob<=($first + $second))[\
<img src="carimages\cupsilver.jpg" width="500" height="300">
You have come second. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 2))
]
(if: $prob>($first+$second) and $prob<=($first + $second + $third))[\
<img src="carimages\cupbronze.jpg" width="500" height="300">
You have come third. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 3))
]
(if: $prob>($first + $second + $third) and $prob<=($first + $second + $third + $finish))[\
<img src="carimages\finish.jpg" width="500" height="300">
Great Work! You finished the race.
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 4))
]
(if: $prob>($first + $second + $third + $finish) and $prob<=($first + $second + $third + $finish + $breakdown))[\
<img src="carimages\break.jpg" width="500" height="300">
Oops! You had a breakdown. It will take some money to repair...
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 5))
]
(if: $racewin's ($racewin's length) is 1)[\
(if: $monthtime<20)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 2000)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 2500)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 3000)
]
]
(if: $racewin's ($racewin's length) is 2)[\
(if: $monthtime<20)[\
(set: $money to $money + 500)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 1300)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 2000)
]
]
(if: $racewin's ($racewin's length) is 3)[\
(if: $monthtime<20)[\
(set: $money to $money + 300)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 800)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1100)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1500)
]
]
(if: $racewin's ($racewin's length) is 4)[\
(if: $monthtime<20)[\
(set: $money to $money + 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 600)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1000)
]
]
(if: $racewin's ($racewin's length) is 5)[\
(if: $monthtime<20)[\
(set: $money to $money - 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money - 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money - 700)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money - 1000)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money - 1500)
]
]
[[Go to City]]
<audio src="carsounds/racing.mp3"; autoplay>(if: $monthtime<120)[\
(if: $racedone's (1) is 0)[\
(set: $first to 50)
(set: $second to 20)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) is 1)[\
(set: $first to 40)
(set: $second to 30)
(set: $third to 10)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) is 2)[\
(set: $first to 30)
(set: $second to 30)
(set: $third to 20)
(set: $finish to 15)
(set: $breakdown to 5)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) is 3)[\
(set: $first to 20)
(set: $second to 20)
(set: $third to 20)
(set: $finish to 30)
(set: $breakdown to 10)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
(if: $racedone's (1) is 4)[\
(set: $first to 0)
(set: $second to 20)
(set: $third to 30)
(set: $finish to 30)
(set: $breakdown to 20)
(set: $prob to (random: 1,100))
(set: $canrace to false)
]
]
(if: $prob>0 and $prob<($first + 1))[\
<img src="carimages\cupgold.jpeg" width="500" height="500">
You have come first. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 1))
]
(if: $prob>$first and $prob<=($first + $second))[\
<img src="carimages\cupsilver.jpg" width="500" height="300">
You have come second. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 2))
]
(if: $prob>($first+$second) and $prob<=($first + $second + $third))[\
<img src="carimages\cupbronze.jpg" width="500" height="300">
You have come third. Congratulations!!!
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 3))
]
(if: $prob>($first + $second + $third) and $prob<=($first + $second + $third + $finish))[\
<img src="carimages\finish.jpg" width="500" height="300">
Great Work! You finished the race.
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 4))
]
(if: $prob>($first + $second + $third + $finish) and $prob<=($first + $second + $third + $finish + $breakdown))[\
<img src="carimages\break.jpg" width="500" height="300">
Oops! You had a breakdown. It will take some money to repair...
(set: $racedone's (1) to $racedone's (1) + 1)
(set: $racewin to it + (a: 5))
]
(if: $racewin's ($racewin's length) is 1)[\
(if: $monthtime<20)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 2000)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 2500)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 3000)
]
]
(if: $racewin's ($racewin's length) is 2)[\
(if: $monthtime<20)[\
(set: $money to $money + 500)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 1000)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 1300)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 2000)
]
]
(if: $racewin's ($racewin's length) is 3)[\
(if: $monthtime<20)[\
(set: $money to $money + 300)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 500)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 800)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 1100)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1500)
]
]
(if: $racewin's ($racewin's length) is 4)[\
(if: $monthtime<20)[\
(set: $money to $money + 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money + 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money + 600)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money + 800)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money + 1000)
]
]
(if: $racewin's ($racewin's length) is 5)[\
(if: $monthtime<20)[\
(set: $money to $money - 100)
]
(if: $monthtime>=20 and $monthtime<55)[\
(set: $money to $money - 300)
]
(if: $monthtime>=55 and $monthtime<75)[\
(set: $money to $money - 700)
]
(if: $monthtime>=75 and $monthtime<100)[\
(set: $money to $money - 1000)
]
(if: $monthtime>=100 and $monthtime<120)[\
(set: $money to $money - 1500)
]
]
[[Go to City]]
<audio src="carsounds/racing.mp3"; autoplay>